//
// CustomFlipper.java : authorized by @visualkhh : visualkhh@gmail.com
//
// Modifed By astro666@hanmail.net(http://blog.daum.net/aero2k)
//

package com.tw.bjkim;


import android.content.Context;
import android.graphics.drawable.Drawable;
import android.os.Handler;
import android.util.AttributeSet;
import android.util.Log;
import android.view.Gravity;
import android.view.MotionEvent;
import android.view.View;
import android.view.ViewGroup;
import android.widget.FrameLayout;
import android.widget.HorizontalScrollView;
import android.widget.LinearLayout;


public class HorizontalFlingerLayout extends FrameLayout 
{
	public HorizontalFlingerLayout(Context context)
	{
		super(context);
		this.context = context;
		init();
	}

	public HorizontalFlingerLayout(Context context, AttributeSet attrs) 
	{
		super(context, attrs);
		this.context = context;
		init();
	}
	
	public HorizontalFlingerLayout(Context context, AttributeSet attrs, int defStyle)
	{
		super(context, attrs, defStyle);
		this.context = context;
		init();
	}
	
	private void init()
	{
		// 1. HorizontalScrollView 는 Content Item들을 담을 Container 이다.
		content_horizontal_container = new HorizontalScrollView(context);
		content_horizontal_container.setHorizontalFadingEdgeEnabled(false);
		content_horizontal_container.setHorizontalScrollBarEnabled(false);	// 하단바의 scroll 상태바를 제거할때 사용한다.
		content_horizontal_container.setLayoutParams(new ViewGroup.LayoutParams(
				ViewGroup.LayoutParams.FILL_PARENT,
				ViewGroup.LayoutParams.FILL_PARENT));
		
		// 2. 각각의 페이지 마다 Content Item(View)들을 담을 Container 이다.
		// addView() 함수을 이용해서 View 들을 추가 한다.
		content_item_container = new LinearLayout(context);
		LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(
				ViewGroup.LayoutParams.FILL_PARENT,
				ViewGroup.LayoutParams.FILL_PARENT,
				0.0F);
		params.leftMargin = 0;
		params.rightMargin = 0;
		params.topMargin = 0;
		params.bottomMargin = 0;
		//params.gravity = Gravity.CENTER;
		content_item_container.setLayoutParams(params);
		content_item_container.setGravity(Gravity.CENTER);
		content_item_container.setOrientation(LinearLayout.HORIZONTAL);
		
		
		// 3. 하나의 페이지를 감싸는 Layout Container로서 content_item_container를 담는다.
		// 이 container 객체는 HorizontalScrollView에 추가 된다.
		container = new LinearLayout(context);
		LinearLayout.LayoutParams params_container = new LinearLayout.LayoutParams(
				ViewGroup.LayoutParams.FILL_PARENT, 
				ViewGroup.LayoutParams.FILL_PARENT, 
				0.0F);
		params_container.leftMargin = 0;
		params_container.rightMargin = 0;
		params_container.topMargin = 0;
		params_container.bottomMargin = 0;
		container.setLayoutParams(params_container);
		container.setGravity(Gravity.CENTER);
		container.setOrientation(LinearLayout.HORIZONTAL);
		
		// "2." 번 content_item_container 는  "3."번  container에 추가 한다.
		// "3." 번 container는 "1."번 content_horizontal_container에 추가 한다.
		container.addView(content_item_container);
		
		content_horizontal_container.addView(container);
		content_horizontal_container.setOnTouchListener(onTouchListener);
		
		// 최종 HorizontalScrollView를 FrameLayout에 추가한다.
		super.addView(content_horizontal_container);
	}
	
	@Override
	protected void onMeasure(int widthMeasureSpec, int heightMeasureSpec)
	{
		for (int i = 0; i < getContentChildCount(); i++)
		{
			View atChild = content_item_container.getChildAt(i);
			LinearLayout.LayoutParams params = (LinearLayout.LayoutParams)atChild.getLayoutParams();
			params.width = getMeasuredWidth();
			params.height = getMeasuredHeight();
			atChild.setLayoutParams(params);
		}
		
		LinearLayout.LayoutParams params = (LinearLayout.LayoutParams) content_item_container.getLayoutParams();
		params.width = (int) getContentWidth();
		params.height = (int) getMeasuredHeight();

		content_item_container.setLayoutParams(params);
		
		int currIndex = getIndex();
		
		switch (interpolationMode) {
		case (HelperFunction.INTERPOLATION_EASEOUT):
			nextPageDividedEaseOut(currIndex);
			break;
		
		case (HelperFunction.INTERPOLATION_EULER_EASEOUT):
			nextPageBasedEulerEaseOut(currIndex);
			break;
			
		case (HelperFunction.INTERPOLATION_EASEINOUT):
			nextPageInterpolationEaseInOut(currIndex);
			break;
		}
		
		super.onMeasure(widthMeasureSpec, heightMeasureSpec);
	}

	// 각각의 페이지 마다 Content Item(View)들을 담을 Container 이다.
	@Override
	public void addView(View child)
	{
		LinearLayout atContainer = new LinearLayout(context);
		LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(
				ViewGroup.LayoutParams.FILL_PARENT, 
				ViewGroup.LayoutParams.FILL_PARENT, 
				0.0F);
		int pading = 0;
		params.leftMargin = pading;
		params.rightMargin = pading;
		params.topMargin = pading;
		params.bottomMargin = pading;
		atContainer.setLayoutParams(params);
		atContainer.setGravity(Gravity.CENTER);
		atContainer.setOrientation(LinearLayout.VERTICAL);
		atContainer.addView(child);
		
		content_item_container.addView(atContainer);
	}
	
	public void addView(View top, View middle, View bottom)
	{
		LinearLayout atContainer = new LinearLayout(context);
		LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(
				ViewGroup.LayoutParams.FILL_PARENT, 
				ViewGroup.LayoutParams.FILL_PARENT, 
				0.0F);
		int pading = 0;
		params.leftMargin = pading;
		params.rightMargin = pading;
		params.topMargin = pading;
		params.bottomMargin = pading;
		params.gravity = Gravity.TOP;
		atContainer.setLayoutParams(params);
		atContainer.setGravity(Gravity.TOP);
		atContainer.setOrientation(LinearLayout.VERTICAL);
		atContainer.addView(top);
		atContainer.addView(middle);
		atContainer.addView(bottom);
		
		content_item_container.addView(atContainer);
	}
	//

	// For Touch Listener
	float moveAction_x = -1.0f;
	float moveAction_y = -1.0f;
	float downAction_x = 0;
	float downAction_y = 0;
	
	long downTime = 0;
	long upTime = 0;
	
	OnTouchListener onTouchListener = new OnTouchListener()
	{

		@Override
		public boolean onTouch(View v, MotionEvent event) 
		{
			int action = event.getAction();
			
			if (D)
				Log.d(TAG, "onTouch - GetAction : " + action);
			
			if (action == event.ACTION_DOWN) 
			{
				// 사용자가 가만히 누른 상태에서 이동을 할 경우에는 dT의 interval의 길어진다.
				// 그럼으로, 모든 다운 처리에 대한 판단은 ACTION_MOVE에서 하도록 하자.
				if (D)
					Log.d(TAG, "onTouch - Down(X) : " + event.getX() +  "Down(Y) : " + event.getY());
				
				return true;				
			} else if (action == event.ACTION_UP)
			{
				upTime = System.currentTimeMillis();
				long dT = Math.abs(upTime - downTime);
				float dX = downAction_x - event.getX();
				int currIndex = getNeighborIndex();
				
				if (D) {
					Log.d(TAG2, "onTouch - Up moveAction_x:" + moveAction_x);
					Log.d(TAG2, "onTouch - Up dT:" + dT + "    dV:" + dX);
				}
				
				if (dT < accelerationDelay_ms) 
				{
					if (dX > 15) 
					{
						// 오른쪽으로  이동
						currIndex = m_nIndex;
						currIndex++;
					} else if (dX < -15) 
					{
						// 왼쪽으로 이동.
						currIndex = m_nIndex;
						currIndex--;
					}
				}
				
				if (D) {
					Log.d(TAG2, "onTouch - dT"+ dT + " Up(X) : " + event.getX() +  "Up(Y) : " + event.getY());
				}
				
				switch (interpolationMode) {
				case (HelperFunction.INTERPOLATION_EASEOUT):
					nextPageDividedEaseOut(currIndex);
					break;
				
				case (HelperFunction.INTERPOLATION_EULER_EASEOUT):
					nextPageBasedEulerEaseOut(currIndex);
					break;
					
				case (HelperFunction.INTERPOLATION_EASEINOUT):
					nextPageInterpolationEaseInOut(currIndex);
					break;
				}
				
				moveAction_x = -1.0f;
				
				return true;
			} else if (action == event.ACTION_MOVE)
			{
				if (D)
					Log.d(TAG, "onTouch - Move : old(" + moveAction_x +")   new(" + event.getX() + ")");
				
				if (moveAction_x == -1.0f) {
					moveAction_x = event.getX();
					downAction_x = event.getX();
					downTime = System.currentTimeMillis();
				}
				
				float dV = moveAction_x - event.getX();
				moveAction_x = event.getX();
				
				setHorizontalView_append_x(dV);
				return true;
			}
			
			return false;
		}
		
	};
	//
	
	// For processing interpolation method.
	private int interpolationMode;
	
	public int getIndex() {
		return m_nIndex;
	}
	
	public void setInterpolationMode(int interpolationMode)
	{
		this.interpolationMode = interpolationMode;
	}
	
	// DividedEaseOut 기반의 감속 보간법
	// GPG Gems vol 1 - 2.1 보간 법 : 부동소수점 연산을 이용한 프레임율 의존적인 감속 보간
	public void nextPageDividedEaseOut(int inputIndex)
	{
		long tm = System.currentTimeMillis();
		
		// 최소 값 경계
		if (inputIndex < 0) {
			inputIndex = 0;
		}
		
		// 최대 값 경계
		if (inputIndex >= getContentChildCount()) {
			inputIndex = getContentChildCount() - 1;
		}
		
		final int index = inputIndex;
		
		Thread threadDividedEaseOut = new Thread() {
			public void run() 
			{
				int step = 60;
				//
				// For interpolation.
				// index : 몇번째 페이지인지 나타낸다. 첫페이지는 0 / 두번째 페이지는 1이다. 
				// getMeasuredWidth() : GalaxyS의 경우, 480이다. : 480x800 : GalaxyTab의 경우, 600x1024
				// getHorizontal_x() : Left로부터 이미 스크롤된 좌표
				//
				// Example
				// 두 번째 페이지에서 이미 291만큼 좌에서 우로 Scroll이 되었다면, 
				// chartWidth = (1 * 480) - 291 = 189 만큼 이동이 남은 상태이다.

				int interpolation_index = 0;
				float[] interpolation_values = new float[step];
				float weight = 8.0f;
				float x0 = 0.0f;
				float x1 = 0.0f;
				final float x_final = (index * getMeasuredWidth()) - getHorizontal_x();
				
				// EaseOut 감속 보간 수식.
				x0 = (x0*(weight-1)+x_final)/weight;
				interpolation_values[interpolation_index++] = x0;
				
				// 손가락을 뗀 시점(ACTION_UP)의 좌표를 기준으로 하여, 보간 처리할 좌표를 생성한다.
				do {
					if (x_final >= 0) {
						if (x0 >= x_final-1) {
							interpolation_values[interpolation_index] = 0;
							break;
						}
					} else {
						if (Math.abs(x0) >= Math.abs(x_final)-1) {
							interpolation_values[interpolation_index] = 0;
							break;
						}
					}
					
					x1 = (x0*(weight-1)+x_final)/weight;
					
					interpolation_values[interpolation_index++] = (x1 - x0);
					x0 = x1;
				} while(interpolation_index <= step);
				
				// Thread.sleep(5ms) 마다 쉬면서 감속 보간을 수행한다.
				for (int i=0; i<interpolation_index; i++) {
					final double x_pos = interpolation_values[i];
					
					if (D)
						Log.d(TAG2, "index:" + i + " x_pos:" + x_pos);
					
					handler.post(new Runnable() {
						@Override
						public void run() {
							setHorizontalView_append_x(x_pos);
						}
					});
					
					try {
						sleep(5);
					} catch (InterruptedException ie) {
						ie.printStackTrace();
					}
				}
					
				handler.post(new Runnable() {
					@Override
					public void run() {
						
						if (D) {
							Log.e(TAG, "Interpolation Done:" + (System.currentTimeMillis() - tm_interpolation) + "ms");
						}
						
						// 페이지의 너비 와 인덱스 저장.
						setHorizontalView_abs_x(index * getMeasuredWidth());
						setIndex(index);
					}
				});
			}
		};
		
		if (D) {
			tm_interpolation = System.currentTimeMillis();
		}
		
		threadDividedEaseOut.start();
		
		if (D) {
			Log.e(TAG, "nextIndexPageBasedFrameInterval:" + (System.currentTimeMillis() - tm) + "ms");
		}
	}

	// 오일러 수 e 기반의 가중치 보간법
	public void nextPageBasedEulerEaseOut(int inputIndex)
	{
		long tm = System.currentTimeMillis();
		
		// 최소 값 경계
		if (inputIndex < 0) {
			inputIndex = 0;
		}
		
		// 최대 값 경계
		if (inputIndex >= getContentChildCount()) {
			inputIndex = getContentChildCount() - 1;
		}
		
		final int index = inputIndex;
		
		Thread threadEulerInterpolation = new Thread() {
			public void run() 
			{
				int step = 40;
				double[] exp = new double[step];
				double sum = 0;
				double interpolation_wi = 0.15;
				
				// Euler number 자연로그 수를 이용하여, 보간 처리한 좌표를 40개 생성한다.
				for (int i=0; i<step; i++) {
					double expVal = Math.exp(-(interpolation_wi*(i+1)));	// 최대 값에서 급격히 감소 하다가 서서히 감소
//					double expVal = Math.exp((interpolation_wi*(i+1)));		// 최소 값에서 서서히 증가 하다가  급격히 증가
					exp[i] = expVal;
					sum += expVal;
					
					if (D)
						Log.d(TAG, "expVal(" + i + "):" + exp[i] + "    sum:" + sum);
				}
				
				for (int i=0; i<step; i++) {
					exp[i] = exp[i] / sum;
					
					if (D)
						Log.d(TAG, "expVal/sum(" + i + "):" + exp[i] + "    sum:" + sum);
				}
				//
				
				//
				// For interpolation.
				// index : 몇번째 페이지인지 나타낸다. 첫페이지는 0 / 두번째 페이지는 1이다. 
				// getMeasuredWidth() : GalaxyS의 경우, 480이다. : 480x800 : GalaxyTab의 경우, 600x1024
				// getHorizontal_x() : Left로부터 이미 스크롤된 좌표
				//
				// Example
				// 두 번째 페이지에서 이미 291만큼 좌에서 우로 Scroll이 되었다면, 
				// chartWidth = (1 * 480) - 291 = 189 만큼 이동이 남은 상태이다.
				final float x_final = (index * getMeasuredWidth()) - getHorizontal_x();
				
				// Thread.sleep(5ms) 마다 쉬면서 감속 보간을 수행한다.
				for (int i=0; i<step; i++) {
					final double x_pos = x_final * exp[i];
					
					if (D)
						Log.d(TAG2, "index:" + i + " chartWidth:" + x_final + "    expVal:" + exp[i] + "    x_pos:" + x_pos);
					
					handler.post(new Runnable() {
						@Override
						public void run() {
							setHorizontalView_append_x(x_pos);
						}
					});
					
					try {
						sleep(5);
					} catch (InterruptedException ie) {
						ie.printStackTrace();
					}
				}
					
				handler.post(new Runnable() {
					@Override
					public void run() {
						
						if (D) {
							Log.e(TAG, "Interpolation Done:" + (System.currentTimeMillis() - tm_interpolation) + "ms");
						}
						
						setHorizontalView_abs_x(index * getMeasuredWidth());
						setIndex(index);
					}
				});
			}
		};
		
		if (D) {
			tm_interpolation = System.currentTimeMillis();
		}
		
		threadEulerInterpolation.start();
		
		if (D) {
			Log.e(TAG, "nextIndexPageBasedEulerNumber:" + (System.currentTimeMillis() - tm) + "ms");
		}
	}
	
	// Ease In Ease Out 기반의 가-감속 보간법
	// GPG Gems vol 1 - 2.1 보간 법 : 프레임율 독립적인 가-감속 보간
	public void nextPageInterpolationEaseInOut(int inputIndex)
	{
		long tm = System.currentTimeMillis();
		
		// 최소 값 경계
		if (inputIndex < 0) {
			inputIndex = 0;
		}
		
		// 최대 값 경계
		if (inputIndex >= getContentChildCount()) {
			inputIndex = getContentChildCount() - 1;
		}
		
		final int index = inputIndex;
		
		Thread threadEaseInOut = new Thread() {
			public void run() 
			{
				int step = 60;
				//
				// For interpolation.
				// index : 몇번째 페이지인지 나타낸다. 첫페이지는 0 / 두번째 페이지는 1이다. 
				// getMeasuredWidth() : GalaxyS의 경우, 480이다. : 480x800 : GalaxyTab의 경우, 600x1024
				// getHorizontal_x() : Left로부터 이미 스크롤된 좌표
				//
				// Example
				// 두 번째 페이지에서 이미 291만큼 좌에서 우로 Scroll이 되었다면, 
				// chartWidth = (1 * 480) - 291 = 189 만큼 이동이 남은 상태이다.
				
				float x0 = 0.0f;	// x0 : from, x_final : to
				float x1 = 0.0f;	// delta X를 구하기 위해서 추가.
				
				// 가속도 a = (to - from) / (time * time / 2) 의 수식이지만,
				// EaseInOut은 가속 하다가 중간 위치에서 감속 처리를 해줘야 함으로 길이가 두배가 되어야 한다.
				// 이때문에 (time * time / 4) 로 유도 되었다.
				final float x_final = (index * getMeasuredWidth()) - getHorizontal_x();
				final float time = 10.0f;
				final float acceleration = (x_final - x0) / (time * time / 4);

				// 가 감속 보간은 시간 변화량에 따른 가속도 값을 구한다.
				// 이 예제에서는 시간 변화량 time를 고정 하였으며, Frame 의존적으로 동작한다.
				int interpolation_index = 0;
				float[] interpolation_values = new float[step+1];
				
				float deltaT = 10.0f / (float)step;
				float velocity = 0.0f;
				float remainingTime = time - deltaT;
				
				// EaseInOut 보간 수식 : value = x + (velocity * deltaT)
				// 가속도에서 2중 적분 하면 거리를 구할수 있다.
				velocity = (acceleration * deltaT);
				x1 = (velocity * deltaT);
				
				interpolation_values[interpolation_index++] = x1;
				
				// 손가락을 뗀 시점(ACTION_UP)의 좌표를 기준으로 하여, 보간 처리할 좌표를 생성한다.
				do {
					if (remainingTime > time/2) {
						// 가속 처리
						velocity += (acceleration * deltaT);
					} else {
						// 감속 처리
						velocity -= (acceleration * deltaT);
					}
					
					x1 += (velocity * deltaT);
					
					interpolation_values[interpolation_index++] = (x1 - x0);
					x0 = x1;
//					interpolation_index++;
					
					remainingTime -= deltaT;
				} while(remainingTime > 0.0f);
				
				// Thread.sleep(5ms) 마다 쉬면서 감속 보간을 수행한다.
				for (int i=0; i<interpolation_index; i++) {
					final double x_pos = interpolation_values[i];
					
					if (D)
						Log.d(TAG2, "index:" + i + " x_pos:" + x_pos);
					
					handler.post(new Runnable() {
						@Override
						public void run() {
							setHorizontalView_append_x(x_pos);
						}
					});
					
					try {
						sleep(5);
					} catch (InterruptedException ie) {
						ie.printStackTrace();
					}
				}
					
				handler.post(new Runnable() {
					@Override
					public void run() {
						
						if (D) {
							Log.e(TAG, "Interpolation Done:" + (System.currentTimeMillis() - tm_interpolation) + "ms");
						}
						
						// 페이지의 너비 와 인덱스 저장.
						setHorizontalView_abs_x(index * getMeasuredWidth());
						setIndex(index);
					}
				});
			}
		};
		
		if (D) {
			tm_interpolation = System.currentTimeMillis();
		}
		
		threadEaseInOut.start();
		
		if (D) {
			Log.e(TAG, "nextPageInterpolationEaseInOut:" + (System.currentTimeMillis() - tm) + "ms");
		}
	}
	// For Linear Interpolation.

	//
	// Background Image 저장
	//
	public void setBackgroundResourceContent(int rsc){
		content_item_container.setBackgroundResource(rsc);
	}
	public void setBackgroundDrawableContent(Drawable draw){
		content_item_container.setBackgroundDrawable(draw);
	}
	public void setBackgroundColorContent(int color){
		content_item_container.setBackgroundColor(color);
	}
	//
	
	//
	// Setter
	//
	private void setIndex(int index) {
		m_nIndex = index;
	}
	private void setHorizontalView_abs_x(int value) {
		content_horizontal_container.scrollTo(value, content_horizontal_container.getScrollY());
		content_horizontal_container.invalidate();
	}
	private void setHorizontalView_append_x(double value) {
		int x = content_horizontal_container.getScrollX() + (int)value;
		int y = content_horizontal_container.getScrollY();
		
		if (D) {
			Log.d(TAG, "content_horizontal_container.getScrollX():" +
					content_horizontal_container.getScrollX() +
					"  v:" + (int)value);
		}

		// HorizontalView를 x, y 좌표 만큼 이동.
		content_horizontal_container.scrollTo(x, y);
	}
	//
	
	//
	// Getter
	//
	private float getContentWidth() {
		float inner_full_width = 0.0f;
		inner_full_width = getMeasuredWidth() * getContentChildCount();	// 전체 영역 크기
		return inner_full_width;
	}
	private float getHorizontal_x() {
		return content_horizontal_container.getScrollX();
	}
	private int getContentChildCount() {
		return content_item_container.getChildCount();
	}
	private int getNeighborIndex() 
	{
		float at_view_point = getViewCenterPoint();	// 사용자가 보고 있는 위치 : (맨 왼쪽 + 절반 크기)
		float horizontal_child_count = getContentChildCount();
		int currIndex = 0;
		
		for (int i = 0; i < horizontal_child_count; i++)
		{
			float left_x = i * getMeasuredWidth();
			float right_x = left_x + getMeasuredWidth();
			
			if (left_x < at_view_point && right_x > at_view_point) {
				currIndex = i;
			}
		}
	
		return currIndex;
	}
	private float getViewCenterPoint() 
	{
		float half_size = getMeasuredWidth() / 2;	// 한장의 화면의 절반 크기
		float horizontal_x = getHorizontal_x();		// 화면에서 맨 왼쪽
		float at_view_point = horizontal_x + half_size; // 사용자가 보고 있는 위치 : (맨 왼쪽 + 절반 크기)
		
		return at_view_point;
	}
	//
	

	private final boolean D = true;
	private final String TAG = "HFlingerLayout";
	private final String TAG2 = "HFlingerLayout.2";
	
	private long tm_interpolation = 0;
	
	private final double accelerationDelay_ms = 240;//120;
	private static int m_nIndex = 0;
	
	private Handler handler = new Handler();
	private LinearLayout container = null;
	private HorizontalScrollView content_horizontal_container = null;
	private LinearLayout content_item_container = null;
	private Context context = null;
}